﻿Imports System.Web.UI
Imports SISSAT.WebDevelopment.Views

Namespace Pages.Administration
    Public Class Index
        Inherits Page

        Protected Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init
            If Not (String.Compare(SISSATPageBase.User.Employee.EmployeeType.Name, "Administrator", True) = 0) Then
                HttpContext.Current.Response.Redirect("/Pages/Home/Index.aspx")
            End If
        End Sub

    End Class
End Namespace
